home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / AB8400.M3 < prev    next >
Encoding:
Text File  |  1996-04-01  |  4.0 KB  |  144 lines
  1. name Allen Bradley 8400
  2.  
  3. % 00
  4. N >4
  5. G >2
  6. O >4
  7. X ->3.>4
  8. Y ->3.>4
  9. Z ->3.>4
  10. R ->3.>4
  11. I ->3.>4
  12. P ->3.>4
  13. J ->3.>4
  14. K ->3.>4
  15. Q ->3.>4
  16. F >4.1
  17. D >2
  18. T >2
  19. M >2
  20. S >4
  21.  
  22. ModalLetters X Y Z F R P K            # List of letters that are modal    
  23.  
  24. ModalGs 73 74 76 81 82 83 84 85       # List of g codes that are modal    
  25.  
  26. Sequence#s N 0 1 1                    # Char, freq, incr & start          
  27. First#? N                             # Y or N  'Output 1st sequence no.  
  28. Last#? N                              # Y or N  'Output last sequence no. 
  29.  
  30. HCode X                               # X or X U  'Horizontal char.       
  31. VCode Y                               # Y or Y V  'Vertical char.         
  32. Dcode Z                               # Depth char.                       
  33. FeedCode F                            # Feed rate char.                   
  34.  
  35. Comment ;                             # Begin End comment char.           
  36.  
  37. Spindle 3 4 5                         # Cw, ccw & stop m codes            
  38. Coolant 8 9 7                         # On, Off & Mist m codes            
  39. DComp 41 42 40                        # Left, Right & Cancel m codes      
  40. LComp 43 49                           # On & Off codes                    
  41.  
  42. Feed G1                             # Linear move                       
  43. Rapid G0                            # Rapid positioning word            
  44. Cw G2                               # Circular move clockwise           
  45. Ccw G3                              # Circular move counter clockwise   
  46. Inc/Abs G 91 90                       # Inc & Abs char. & values          
  47. CtrCode I J                           # I J or R or I J K L               
  48. Helical? Y
  49.  
  50. Spaces? Y                             # Y or N  'Spaces between words     
  51. Incremental? N                        # Y or N  'Inc or abs output        
  52. CtrIncremental? N                     # Y or N  'Inc or abs I & J         
  53. ByQuadrants? Y                        # Y or N  'Break arcs at quadrants  
  54.  
  55. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  56.  
  57. WorkDefault 1                         # Work offset register default      
  58.  
  59. LTap                                  # Left handed tapping cycle         
  60. G74 X[H] Y[V] Z[D] F[Frate] I[VBite]
  61. end cancel
  62.  
  63. Drill                                 # Drilling canned/manual cycle      
  64. G92 Z[RPlane]
  65. G81 X[H] Y[V] Z[D] R[VClear] P[RPlane] F[FRate]
  66. end cancel
  67.  
  68. Peck                                  # Pecking canned/manual cycle       
  69. G92 Z[RPlane]
  70. G83 X[H] Y[V] Z[D] R[VClear] P[RPlane] K[VBite] F[FRate]
  71. end cancel
  72.  
  73. Tap                                   # Tapping canned/manual cycle       
  74. G84 X[H] Y[V] Z[D] F[Frate] K[VBite]
  75. end cancel
  76.  
  77. Ream                                  # Reaming canned/manual cycle       
  78. G85 X[H] Y[V] Z[D] F[FRate]
  79. end cancel
  80.  
  81. Bore                                  # Boring canned/manual cycle        
  82. G86 X[H] Y[V] Z[D] F[FRate]
  83. end cancel
  84.  
  85. Back                                  # Back boring canned/manual cycle   
  86. G87 X[H] Y[V] Z[D] F[FRate]
  87. end cancel
  88.  
  89. Cancel                                # Cancel a canned/manual cycle      
  90. G80
  91. end
  92.  
  93. StartCode                             # Start of the program              
  94. End
  95.  
  96. 1stToolChange                         # First tool change                 
  97. G99
  98. G90
  99. O0
  100. G0 Z0
  101. G45 O[Work]
  102. O[Tool]
  103. M[Direct] S[Speed]
  104. M[Cool]
  105. G0 X[H] Y[V] Z[RPlane]
  106. End
  107.  
  108. Infeed                                # Enable cutter comp                
  109. G[Side] X[H] Y[V] D[DComp] F[FRate]
  110. end
  111.  
  112. Outfeed                               # Disable cutter comp               
  113. G1 G40 X[H] Y[V] Z[RPlane]
  114. end
  115.  
  116. ToolChange                            # Secondary tool changes            
  117. O0
  118. M9
  119. M5
  120. M06
  121. G45 O[Work]
  122. O[Tool]
  123. M[Direct] S[Speed]
  124. M[Cool]
  125. G0 X[H] Y[V] Z[RPlane]
  126. End
  127.  
  128. CwCode
  129. G2 X[H] Y[V] Z[D] I[Ival] J[Jval] F[Frate]
  130. End
  131.  
  132. CcwCode
  133. G3 X[H] Y[V] Z[D] I[Ival] J[Jval] F[Frate]
  134. End
  135.  
  136. EndCode                               # End of the program                
  137. O0
  138. M9
  139. G99
  140. Z0
  141. M2
  142. End
  143.  
  144.